home *** CD-ROM | disk | FTP | other *** search
/ IRIX 6.2 Development Libraries / SGI IRIX 6.2 Development Libraries.iso / dist / complib.idb / usr / share / catman / p_man / cat3 / complib / slascl.z / slascl
Text File  |  1996-03-14  |  3KB  |  133 lines
  1.  
  2.  
  3.  
  4. SSSSLLLLAAAASSSSCCCCLLLL((((3333FFFF))))                                                          SSSSLLLLAAAASSSSCCCCLLLL((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      SLASCL - multiplie the M by N real matrix A by the real scalar CTO/CFROM
  10.  
  11. SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  12.      SUBROUTINE SLASCL( TYPE, KL, KU, CFROM, CTO, M, N, A, LDA, INFO )
  13.  
  14.          CHARACTER      TYPE
  15.  
  16.          INTEGER        INFO, KL, KU, LDA, M, N
  17.  
  18.          REAL           CFROM, CTO
  19.  
  20.          REAL           A( LDA, * )
  21.  
  22. PPPPUUUURRRRPPPPOOOOSSSSEEEE
  23.      SLASCL multiplies the M by N real matrix A by the real scalar CTO/CFROM.
  24.      This is done without over/underflow as long as the final result
  25.      CTO*A(I,J)/CFROM does not over/underflow. TYPE specifies that A may be
  26.      full, upper triangular, lower triangular, upper Hessenberg, or banded.
  27.  
  28.  
  29. AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
  30.      TYPE    (input) CHARACTER*1
  31.              TYPE indices the storage type of the input matrix.  = 'G':  A is
  32.              a full matrix.
  33.              = 'L':  A is a lower triangular matrix.
  34.              = 'U':  A is an upper triangular matrix.
  35.              = 'H':  A is an upper Hessenberg matrix.
  36.              = 'B':  A is a symmetric band matrix with lower bandwidth KL and
  37.              upper bandwidth KU and with the only the lower half stored.  =
  38.              'Q':  A is a symmetric band matrix with lower bandwidth KL and
  39.              upper bandwidth KU and with the only the upper half stored.  =
  40.              'Z':  A is a band matrix with lower bandwidth KL and upper
  41.              bandwidth KU.
  42.  
  43.      KL      (input) INTEGER
  44.              The lower bandwidth of A.  Referenced only if TYPE = 'B',
  45.  
  46.      KU      (input) INTEGER
  47.              The upper bandwidth of A.  Referenced only if TYPE = 'B',
  48.  
  49.      CFROM   (input) REAL
  50.              CTO     (input) REAL The matrix A is multiplied by CTO/CFROM.
  51.              A(I,J) is computed without over/underflow if the final result
  52.              CTO*A(I,J)/CFROM can be represented without over/underflow.
  53.              CFROM must be nonzero.
  54.  
  55.      M       (input) INTEGER
  56.              The number of rows of the matrix A.  M >= 0.
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70. SSSSLLLLAAAASSSSCCCCLLLL((((3333FFFF))))                                                          SSSSLLLLAAAASSSSCCCCLLLL((((3333FFFF))))
  71.  
  72.  
  73.  
  74.      N       (input) INTEGER
  75.              The number of columns of the matrix A.  N >= 0.
  76.  
  77.      A       (input/output) REAL array, dimension (LDA,M)
  78.              The matrix to be multiplied by CTO/CFROM.  See TYPE for the
  79.              storage type.
  80.  
  81.      LDA     (input) INTEGER
  82.              The leading dimension of the array A.  LDA >= max(1,M).
  83.  
  84.      INFO    (output) INTEGER
  85.              0  - successful exit <0 - if INFO = -i, the i-th argument had an
  86.              illegal value.
  87.  
  88.  
  89.  
  90.  
  91.  
  92.  
  93.  
  94.  
  95.  
  96.  
  97.  
  98.  
  99.  
  100.  
  101.  
  102.  
  103.  
  104.  
  105.  
  106.  
  107.  
  108.  
  109.  
  110.  
  111.  
  112.  
  113.  
  114.  
  115.  
  116.  
  117.  
  118.  
  119.  
  120.  
  121.  
  122.  
  123.  
  124.  
  125.  
  126.  
  127.  
  128.  
  129.                                                                         PPPPaaaaggggeeee 2222
  130.  
  131.  
  132.  
  133.